home *** CD-ROM | disk | FTP | other *** search
/ Maclife 9 / MACLIFE09.7z / MACLIFE09-No-89.ISO / 特集I / FreeWare / Arashi111.sea / ARASHI 1.1.1 ƒ / Arashi 1.1.1.rsrc / TEXT_2128.txt < prev    next >
Text File  |  1994-09-01  |  4KB  |  150 lines
  1. /*
  2. **    PreScript:
  3. **
  4. **    Don't remove this comment or type anything before it.
  5. */
  6.  
  7. //    The following variables are for internal use:
  8.  
  9.         DEPTH            =        120
  10.  
  11.         iLevelNumber    =    0
  12.         iLevelField        =    (iLevelNumber + 15) % 16 + 1 min 1 max 16
  13.         iLevelColor        =    ( (iLevelNumber+15) / 16) min 1 max 6 
  14.         iLevelBonus        =    100 * int((iLevelNumber+15) / 16)
  15.         iLevelStartBonus =    500 * int(iLevelNumber^1.5) - 500
  16.         iLevelNext        =    iLevelNumber + 1
  17.  
  18.         iPlayerMaxMove        =    12
  19.         iPlayerSuperZaps    =    1
  20.  
  21.         iShotSpeed        =        4
  22.         iShotPower        =        4
  23.         iShotColor[0]    =        1
  24.         iShotColor[1]    =        0
  25.         iShotColor[2]    =        6
  26.         iShotColor[3]    =        4
  27.         iShotColor[4]    =        5
  28.  
  29.         iFlipperPoints    =        150
  30.         iFlipperCount    =        3
  31.         iFlipperProb    =        700
  32.         iFlipperSpeed    =        65536
  33.         iFlipperRot        =        4
  34.         iFlipperColor    =        2
  35.  
  36.         iTank[0].points    =        100
  37.         iTank[0].count    =        0
  38.         iTank[0].prob    =        600
  39.         iTank[0].speed    =        65536
  40.         iTank[0].color    =        6
  41.  
  42.         iTank[1].points    =        100
  43.         iTank[1].count    =        0
  44.         iTank[1].prob    =        600
  45.         iTank[1].speed    =        65536
  46.         iTank[1].color    =        4
  47.  
  48.         iTank[2].points    =        100
  49.         iTank[2].count    =        0
  50.         iTank[2].prob    =        600
  51.         iTank[2].speed    =        65536
  52.         iTank[2].color    =        0
  53.  
  54.         iFusePoints        =        500
  55.         iFuseBullseye    =        750
  56.         iFuseCount        =        0
  57.         iFuseProb        =        600
  58.         iFuseWarpP        =        2
  59.         iFusePlayerPlus    =        40
  60.         iFuseColor[0]    =        0
  61.         iFuseColor[1]    =        5
  62.         iFuseColor[2]    =        1
  63.         iFuseColor[3]    =        4
  64.         iFuseColor[4]    =        2
  65.  
  66.         iPulsarPoints    =        200
  67.         iPulsarCount    =        0
  68.         iPulsarProb        =        600
  69.         iPulsarSpeed    =        32768
  70.         iPulsarRot        =        5
  71.         iPulsarColor    =        5
  72.         iPulsarTime        =        20
  73.         iPulsarPulsDepth=        DEPTH-DEPTH/5
  74.  
  75.         iSpikerPoints    =        50
  76.         iSpikerProb        =        100
  77.         iSpikerSpeed    =        65536
  78.         iSpikerStart    =        DEPTH
  79.         iSpikerTop        =        10
  80.         iSpikerPlasma    =        1
  81.         iSpikerPlSpeed    =        5*65536
  82.         iSpikerPlPoints    =        200
  83.         iSpikerSpikePoints=        1
  84.         iSpikerColor[0]    =        3
  85.         iSpikerColor[1]    =        0
  86.         iSpikerColor[2]    =        5
  87.  
  88.         iBoredomCount    =        4
  89.         iBoredProb        =        2000
  90.         iEndTimer        =        60
  91.         iAllowPracticeRestart    =        1
  92.         iAllowArcadeRestart        =        1
  93.         iShowSpikesMsg    =    0
  94.         iDoomsday = 0
  95.         
  96. // These are the variables you are supposed to access:
  97.  
  98.     Level            =    iLevelNumber
  99.     SubLevel        =    (Level+15) % 16
  100.     ColorLevel        =    (Level-1) / 16    min 0
  101.     iShotPower        =    ShotPower
  102.     ShotPower        =    3
  103.  
  104.     //    Flippers:
  105.     iFlipperProb    =    FlipperProb * 1000 min 0
  106.     iFlipperCount    =    FlipperCount min 0
  107.     iFlipperRot        =    FlipperRot min 0 max 100
  108.     iFlipperSpeed    =    FlipperSpeed * 65536 min 1000
  109.  
  110.     iTank[0].prob    =    FlipTankProb * 1000 min 0
  111.     iTank[0].count    =    FlipTankCount min 0
  112.     iTank[0].speed    =    FlipTankSpeed * 65536 min 1000
  113.  
  114.     //    Spikers:
  115.     iSpikerStart    =    SpikeStart min (DEPTH * 0.05) max DEPTH
  116.     iSpikerTop        =    SpikeTop min (DEPTH * 0.05) max DEPTH
  117.     iSpikerProb        =    (iSpikerTop < DEPTH) * SpikerProb * 100 min 0 max 200
  118.     iSpikerSpeed    =    SpikerSpeed * 65536 min 10000
  119.  
  120.     //    Fuseballs
  121.     iFuseCount        =    FuseCount
  122.     iFuseProb        =    FuseProb * 1000 min 0
  123.     iFuseWarpP        =    FuseWarpP * 10 min 0
  124.     iFusePlayerPlus    =    FusePlayerPlus * 100 min 0
  125.  
  126.     iTank[1].prob    =    FuseTankProb * 1000 min 0
  127.     iTank[1].count    =    FuseTankCount min 0
  128.     iTank[1].speed    =    FuseTankSpeed * 65536 min 1000
  129.  
  130.     //    Pulsars
  131.     iPulsarCount    =    PulsarCount
  132.     iPulsarProb        =    PulsarProb * 1000 min 0
  133.     iPulsarSpeed    =    PulsarSpeed * 65536 min 1000
  134.     iPulsarRot        =    PulsarRot min 0 max 100
  135.     iPulsarTime        =    PulsarTime
  136.  
  137.     iTank[2].prob    =    PulsarTankProb * 1000 min 0
  138.     iTank[2].count    =    PulsarTankCount min 0
  139.     iTank[2].speed    =    PulsarTankSpeed * 65536 min 1000
  140.  
  141.     //    Game difficulty:
  142.     iBoredomCount    =    BoredomCount
  143.     iBoredProb        =    BoredProb * 2000 min 0
  144.     iEndTimer        =    EndTimer * 60 min 1
  145.     iAllowPracticeRestart    =    AllowPracticeRestart - (Level > 95)
  146.     iAllowArcadeRestart    =    AllowArcadeRestart - (Level > 95)
  147.     iShowSpikesMsg    =    (Level > 3) - (Level > 8)
  148.     iDoomsday = (Level > 96)
  149. //    End of prescript.
  150.